home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 30
/
Aminet 30 (1999)(Schatztruhe)[!][Apr 1999].iso
/
Aminet
/
mus
/
edit
/
OctamedSS1.03c.lha
/
Soundstudio
/
Rexx
/
omed.lha
/
rexx
/
RotateTrack.omed
< prev
next >
Wrap
Text File
|
1995-03-29
|
304b
|
17 lines
/* RotateTrack.omed */
address OCTAMED_REXX
'op_update off'
'ed_getnumlines var line'
'ed_getcurrtrack var track'
'ed_getcurrline var currline'
'rn_setrange' track line-1 track line-1
'rn_copy range'
'ed_advanceline fkey 6'
'ed_insertemptynote'
'rn_paste range'
'ed_goto line' currline
'op_update on'